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ABSTRACT 


This  report  describes  programs  and  proce¬ 
dures  which  can  be  used  to  create  an  interactive 
graphics  data  base  from  the  results  of  finite 
element  structural  analysis  programs  and  similar 
computer  programs.  Finite  element  models  and  the 
results  of  computations,  stored  in  this  form,  can 
be  displayed  and  manipulated  using  interactive 
graphics  terminals.  One  program  is  an  interactive 
text  editor  for  reformatting  the  print  file 
produced  by  the  analysis  programs .  A  second 
program  carries  out  the  data  base  creation  and 
modification  operations.  All  program  commands  and 
controls  are  described  and  illustrated  by  examples. 
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Request  number  FY  14567900016  issued  by  the  Air  Force  Flight  Dynamics 
Laboratory,  Wright-Patterson  Air  Force  Base,  Ohio.  The  work  was  performed 
under  Work  Unit  1844-122. 


INTRODUCTION 

STAGING  is  an  interactive  support  system  for  finite  element  analysis 

which  runs  on  large  CDC  computers.  STAGING  provides  tools  for  creating 

and  modifying  finite  element  models  and  for  graphic  display  of  the  model 

and  the  results  of  analysis  runs  like  the  views  of  a  3-D  solid  finite 

1* 

element  model  shown  in  Figure  1.  Before  the  development  of  the  text 
editor  and  data  base  loader,  STAGING  users  were  required  to  construct 
interface  programs  to  link  their  particular  analysis  programs  with 
STAGING.  The  STAGING  text  editor  and  loader  provides  a  means  for  using 
STAGING  to  display  the  finite  element  model  and  analysis  results  without 
the  use  of  specially  tailored  interface  programs. 

The  STAGING  text  editor  and  loader  can  be  used  with  any  computer 
data  available  in  character  format.  The  data  input  file  and  the  printer 
output  file  associated  with  an  analysis  run  are  usually  the  most 


*A  complete  listing  of  references  is  given  on  page  55. 
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Figure  1  -  STAGING  Views  of  a  3-D  Solid  Finite  Element  Model 
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convenient  source  of  data  for  the  text  editor  and  loader.  In  order  to  use 
the  printer  output  file  with  the  editor  and  loader,  the  user  must  make 
provisions  for  saving  that  file  on  permanent  disk  storage.  The  text 
editor  and  the  data  base  loader  can  be  used  in  either  interactive  or 
batch  modes.  Editor  and  loader  commands  can  also  be  saved  and  used 
repetitively  for  a  series  of  similar  analysis  problems. 

Like  STAGING,  the  text  editor  and  the  data  base  loader  will  run  on 
most  large  CDC  computers.  Both  the  text  editor  and  the  loader  are 
written  in  ANSI  standard  FORTRAN  IV.  No  special  assembler  language 
subroutines  have  been  written  and  the  only  such  routines  used  are  part  of 
the  STAGING  data  base  support  library.  The  language  constraints  imposed 
on  the  programmer  should  simplify  the  conversion  of  the  programs  for  use 
on  other  computers.  However,  such  constraints  have  impaired  the 
efficiency  of  the  text  editor  to  some  extent  and  have  limited  the  file 
manipulation  capability  within  the  text  editor.  It  should  be  noted  that, 
although  the  text  editor  and  loader  provide  a  comprehensive  data  base 
loading  capability,  they  do  not  provide  a  means  for  extracting  data  from 
a  STAGING  data  base.  The  use  of  the  text  editor  with  existing  data 
extraction  programs  offers  a  much  broader  capability  in  this  area. 

USING  THE  PROGRAMS 

The  STAGING  data  base  loader  processes  a  file  consisting  of  loader 
commands  and  numeric  data  to  produce  a  new  or  updated  STAGING  data  base. 
The  loader  commands  are  used  to  specify  the  relationship  between  the 
numeric  data  and  the  various  categories  and  identifiers  used  in  the  data 
base  organization.  Any  file  containing  commands  and  data  which  conforms 
to  the  data  base  loader  rules  may  be  used  as  loader  input.  The  STAGING 
text  editor  is  simply  one  tool  for  transforming  a  data  file  in  a  user's 
format  to  an  acceptable  data  base  loader  file. 

THE  TEXT  EDITOR 

The  STAGING  text  editor  is  an  implementation  of  the  text  editor 
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described  by  Kernighan  and  Plauger  in  their  book  Software  Tools.  This 
editor  has  many  features  which  simplify  the  task  of  producing  a  loader 
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file.  This  section  of  the  manual  has  been  limited  to  a  discussion  of 
some  basic  editing  operations  which  are  illustrated  with  simple  examples. 
The  user  should  refer  to  Appendix  A  for  a  complete  description  of  the 
editor  commands  and  operations. 

To  begin  editing  a  file  the  user  enters 
EDIT,  <file> 

where  <file>  is  the  name  of  the  file  containing  text  to  be  edited. 

The  editor  is  basically  line  oriented  and  the  range  of  eacn  editor 
command  is  controlled  by  a  set  of  line  numbers.  The  command 
1  P 

will  cause  the  first  line  to  be  printed  and  the  command 
1,3  D 

will  cause  lines  1,  2,  and  3  to  be  deleted. 

A  period  (.)  is  used  to  indicate  the  current  line  and  the  dollar 
sign  ($)  refers  to  the  last  line  of  the  file.  Simple  arithmetic  may  be 
performed  to  modify  the  line  numbers.  Thus 
.4-1, $-1  D 

will  delete  all  lines  between  the  current  line  and  the  last  line. 

The  editor  will  determine  the  line  numbers  for  lines  containing  a 
specified  text  pattern  whenever  it  encounters  a  text  string  bracketed 
by  slashes  in  place  of  a  line  number.  Forward  slashes  (/)  specify  the 
first  line  after  the  current  line  which  contains  the  specified  pattern. 
Similarly,  backward  slashes  (\)  specify  the  first  previous  line  which 
contains  the  pattern.  Such  pattern  searches  are  performed  in  a  circular 
mode  which  proceeds  to  the  first  line  after  the  last  line  has  been 
passed  (the  opposite  holds  for  backward  searches) .  Thus 
\BEGIN  BULK\, /ENDDATA/  P 

will  print  the  first  previous  line  containing  "BEGIN  BULK"  and  all 
subsequent  lines  through  the  next  line  containing  "ENDDATA". 

When  more  than  one  line  number  is  required,  the  line  numbers  are 
usually  separated  by  commas.  If  line  numbers  are  separated  by  semicolons, 
the  preceding  line  number  will  be  established  as  the  current  line  number. 
If  more  line  numbers  are  specified  than  the  maximum  permitted  for  the 
command,  the  rightmost  line  numbers  will  be  used.  The  command 
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/ABC/, /ABC/  P 

will  print  the  next  line  containing  "ABC"  as  would 
/ABC/  P  or  /ABC/;.  P 
The  command 

/ABC/; /ABC/; /ABC/  P 

will  print  the  second  line  containing  "ABC"  and  all  subsequent  lines 
through  the  third  line  containing  "ABC". 

The  editor  "remembers"  the  last  search  pattern  specified  so  that  the 
previous  command  could  have  also  been  given  as 
/ABC/;//;.,//  P  . 

Basic  editor  commands  are  one  character  long  and  blank  characters 
can  be  freely  interspersed  between  command  parameters,  although  none  are 
required.  If  no  command  is  included  with  the  line  numbers,  the  line 
indicated  by  the  rightmost  number  will  be  printed. 

Probably  the  most  heavily  used  command  is  "C";  indicating  a  change 
or  substitution  of  a  text  string  within  a  line.  The  command 
C/ABC/DEF/ 

will  substitute  "DEF"  for  the  first  occurrence  of  "ABC"  in  the  line.  The 
substitution  can  be  repeated  throughout  the  line  by  appending  "G"  (for 
global)  at  the  end  of  the  command.  Thus 
C/ABC/DEF/  G 

will  substitute  "DEF"  for  all  occurrence  of  "ABC"  within  a  line. 

The  results  of  an  editor  operation  will  be  printed  if  a  "P"  is 
appended  to  the  command .  Thus 
C/ABC/DEF/  G  P 

will  display  the  line  after  the  substitution  of  the  previous  example  has 
been  made. 

If  a  string  contains  a  slash,  the  user  may  choose  other  strirg 
delimiters  or  precede  the  slash  by  the  escape  character,  (@) .  The 
commands 

C/@//-/  and 

c ;/;-; 

both  change  a  slash  to  a  dash. 
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Many  options  are  available  for  forming  search  and  substitution 
patterns.  A  "!"  is  used  to  indicate  the  beginning  of  a  line  and  "$" 
indicates  the  end  of  a  line.  "?"  represents  any  character  and 
indicates  zero  or  more  occurrences  of  the  previous  character.  Lines  can 
be  divided  by  inserting  "@N"s  to  indicate  where  new  lines  are  to  begin. 

An  is  used  in  a  substitution  string  to  indicate  the  matched  pattern. 
Thus 

C/AGAIN/&  AND  &/ 

will  change  "AGAIN"  to  "AGAIN  AND  AGAIN". 

The  pattern  matching  capability  of  the  text  editor  is  quite  powerful. 
The  pattern 

/ABC???/ 

will  match  all  strings  which  begin  with  "ABC"  followed  by  any  three 
additional  characters.  The  pattern 
/ABC??*/ 

will  match  all  strings  beginning  with  "ABC"  which  are  followed  by  one  or 
more  additional  characters.  The  pattern 
/ABC {0-9} {0-9}*/ 

will  match  "ABC"  followed  by  one  or  more  digits.  The  pattern 
/ ABC { ~A-Z } / 

will  match  "ABC"  followed  by  any  character  which  is  not  alphabetic. 

Text  editor  commands  can  be  applied  to  several  lines  of  text  by 
specifying  a  global  range  for  the  commands.  The  command 
1 , $  G  /ERROR/  P 

will  print  all  lines  which  contain  the  string  "ERROR".  The  command 
$-99,$  X  /!  /  =  P 

will  print  the  line  and  the  line  number  (requested  by  "=")  for  all  lines 
within  the  last  100  lines  of  the  file,  excluding  (from  the  "X")  those 
lines  that  begin  with  a  blank  character. 

If  is  chosen  as  a  tab  character,  the  global  change  command 

G  /;/  C  //  /  G 

will  cause  the  text  to  be  indented  five  spaces  wherever  the  tab  character 
occurs.  Similarly,  the  two  commands 
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G/?????????????? ??????????????? ???????????/  C//&0NTRASH/ 

G/! TRASH/  D 

will  truncate  all  lines  to  40  characters. 

The  command 
I 

permits  the  user  to  insert  lines  of  text  after  the  current  line.  Text 
insertion  will  terminate  when  a  line  is  entered  which  contains  only  a 
period  (.).  The  command 
R  FILEA 

causes  the  editor  to  read  FILEA  and  insert  those  lines  read  after  the 
current  line.  Lines  of  text  can  be  saved  on  a  file  using  the  write 
command,  "W" .  Thus 

. ,$  W  FILEB 

will  write  the  current  line  and  the  remainder  of  the  edit  file  to  a  file 
named  "FILEB".  All  files  will  be  rewound  before  and  after  read,  write, 
and  edit  ("EDIT,  <file>"  and  "E")  commands  with  the  exception  of  the  file 
SINPUT  which  is  not  rewound  when  a  write  command  is  processed  and 
following  a  read  command.  The  special  nature  of  the  SINPUT  file  permits 
the  user  to  accumulate  text  on  that  file. 

The  user  is  cautioned  that  the  file  names  used  by  the  text  editor 
must  either  be  listed  on  the  "EDIT"  system  control  command  or  be  one  of 
the  default  file  names  listed  in  Appendix  A.  Further,  the  user  must 
not  attempt  to  overwrite  a  permanent  disk  file.  This  will  cause  the 
immediate  termination  of  the  text  editor  and  the  loss  of  the  current  edit 
file.  The  system  command  sequence  given  in  Appendix  B  may  be  used  to 
avoid  most  of  the  problems  associated  with  the  creation  and  editing  of 
permanent  disk  files. 

THE  DATA  BASE  LOADER 

The  STAGING  data  base  loader  reads  a  file  of  commands  and  data  and 
either  creates  a  new  STAGING  data  base  or  appends  information  to  an 
existing  STAGING  data  base.  Data  base  creation  and  modification  are 
accomplished  using  STAGING'S  data  base  access  subroutines.  This  section 
of  the  manual  has  been  limited  to  a  general  discussion  of  the  operation 
of  the  loader.  The  user  should  refer  to  Appendix  C  for  a  complete 
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description  of  the  loader  commands  and  operations  and  to  the 
EDITOR/LOADER  EXAMPLE  section  for  some  typical  procedures  used  to  create 
and  modify  STAGING  data  bases. 

Data  to  be  loaded  by  the  loader  must  be  grouped  in  sets  which  have 
common  characteristics.  The  command 
SET,  NODES 

defines  the  beginning  of  a  set  of  node-type  data  to  be  stored  in  the  data 
base.  The  command 

SET,  ELEMENTS 

similarly  refers  to  a  set  of  element-type  data  to  be  stored  in  the  data 
base . 

To  further  specify  the  characteristics  of  the  data,  the  commands: 
"VARIABLE",  "CONSTANT",  and  "INDEX"  may  be  used.  Various  combinations  of 
these  commands  permit  the  user  to  specify  the  attributes  and  format  of 
data  records  to  be  loaded.  A  data  record  consists  of  a  fixed  number  of 
data  fields  which  may  be  spread  over  several  input  lines.  A  data  field 
can  be  an  integer  number,  a  real  number,  or  null.  The  data  fields  on 
one  input  line  must  be  separated  by  blanks  or  commas. 

The  location  and  attributes  of  data  that  will  be  read  explicitly 
from  the  input  file  are  defined  using  the  VARIABLE  command.  Thus 
VARIABLE,  NAME,  SKIP,  X-CORD,  Y-CORD 
specifies  a  four-field  data  record  for  node-type  data.  The  first  field 
is  to  contain  the  node  ID  or  NAME,  the  second  field  is  to  be  ignored,  and 
the  third  and  fourth  fields  are  to  contain  x-  and  y-coordinate  data, 
respectively.  Additional  variable  commands,  within  the  same  set,  can  be 
used  to  specify  fields  in  addition  to  the  four  current  fields. 

The  values  of  data  attributes  that  will  remain  constant  for  all 
data  records  in  the  current  set  are  specified  using  the  CONSTANT  command. 
Thus 

CONSTANT,  CORD-SYSTM,  1,  Z-CORD,  1.5 
specifies  that  each  data  record  in  this  set  will  have  a  coordinate 
system  attribute  of  "1"  and  a  z-coordinate  attribute  of  "1.5"  stored  with 
the  data  that  is  read  explicitly.  The  CONSTANT  command  is  also  used  to 
define  initial  values  for  attributes  that  are  to  be  incremented.  If  the 
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same  attribute  is  included  as  part  of  more  than  one  CONSTANT  command,  the 

last  value  given  will  be  used  for  data  loading. 

The  INDEX  command  is  used  to  define  an  increment  for  an  attribute 

value  or  an  attribute  subscript  that  is  to  be  applied  after  each  data 

record  is  processed.  The  sequence 

VARIABLE,  SKIP,  NODE,  NODE,  NODE 
CONSTANT,  NAME,  100,  TYPE,  $GEN  TRIA$ 

INDEX,  NAME,  10 

could  be  used  to  specify  element  ID's  for  triangular  elements.  The  ID's 
100,  110,  120,  ...  will  be  generated  by  this  sequence.  The  sequence 
VARIABLE,  $X  DISP$,  $Y  DISP$ 

CONSTANT,  NAME,  72,  $X  DISP$,  0,  $Y  DISP$,  0,  $Z  DISP$,  0 
INDEX,  $X  DISP$ ,  1,  $Y  DISP$ ,  1,  $Z  DISP$,  1 
CONSTANT,  $Z  DISP$,  .001 

specifies  that  the  data  in  this  set  applies  to  node  72,  that  data  for 
several  load  cases  or  time  steps  are  to  be  loaded  starting  with  case  zero, 
and  that  the  z-displacement  for  each  case  is  not  to  be  read,  but  instead, 
set  to  a  value  of  .001. 

The  attribute  names  and  element  types  currently  recognized  by 

STAGING  are  listed  in  Appendix  D.  Note  that  attribute  names  and  element 

types  which  contain  blanks  must  be  bracketed  by  a  pair  of  dollar  signs. 

The  loader  will  terminate  with  an  error  condition  if  unknown  attribute 

names  or  element  types  are  encountered. 

The  beginning  of  a  set  of  data  records  is  indicated  by  the  "BEGIN 

DATA"  command.  The  end  of  a  set  is  marked  by  an  "ENDDATA"  command.  Each 

new  data  record  begins  on  a  new  input  line.  Thus  the  sequence 

BEGIN  DATA 
1,2, 3, 4 
5,6, 7,8 
9,10,11,12 
13,14,15,16 
ENDDATA 

could  be  used  to  define  data  for:  four  data  sets  which  are  up  to  four 
fields  long,  two  data  sets  which  are  between  five  and  eight  fields  long, 
or  one  data  set  which  is  between  13  and  16  fields  long. 

The  commands 

SET,  NODES  and 
SET,  NODES,  APPEND 
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are  equivalent.  They  indicate  that  node- type  data  are  to  be  appended  to 
an  existing  data  base.  In  this  mode,  the  user  needs  only  to  specify  the 
attributes  necessary  for  defining  the  data  to  be  loaded  in  this  set.  The 
command 

SET,  NODES,  INITIAL 

indicates  that  a  new  data  base  is  to  be  created.  In  this  mode  all  data 
attributes  must  be  defined  prior  to  the  loading  of  any  data.  The 
following  sequence  could  be  used  to  define  elements  and  nodes  in  a  new 
data  base: 


SET,  NODES,  INITIAL 

VARIABLE,  NAME,  X-CORD,  Y-CORD,  Z-CORD 

CONSTANT,  CORD-SYSTM,  1 

SET,  ELEMENTS,  INITIAL 

VARIABLE,  NAME,  NODE,  NODE 

CONSTANT,  TYPE,  ROD 

BEGIN  DATA 

<data  records> 

ENDDATA 

SET,  NODES,  INITIAL 

VARIABLE,  NAME,  X-CORD,  Y-CORD,  Z-CORD 
CONSTANT,  CORD-SYSTM,  1 
BEGIN  DATA 
<data  records> 

ENDDATA 

Append-mode  data  sets  may  follow  the  initial  sets  if  other  data  is  to 
be  inserted  in  the  same  loader  run.  Append-mode  loading  permits  new 
attributes  to  be  appended  to  existing  data  and  new  elements  and  node  data 
to  be  inserted  into  the  data  base.  Additional  node  points  can  also  be 
appended  to  element  definitions  in  this  mode.  It  should  be  noted  that 
initial-mode  loading  is  much  more  efficient  than  append-mode  loading  and 
should  be  used  whenever  possible. 

The  command  and  data  file  will  be  read  until  no  more  commands  are 
found  or  until  an  ENDDATA  command  is  encountered  outside  of  a  BEGIN 
DATA/ENDDATA  sequence. 

Once  a  command  and  data  file  has  been  assembled  and  the  program  file 
has  been  attached  as  file  "SLOAD",  the  loader  can  be  invoked  by  the 
system  command 

SLOAD, <infile> 

where  <infile^  is  the  name  of  the  loader  command  and  data  file  (the 
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default  name  for  this  file  is  "S INPUT" ) •  About  50000  (octal)  words  of 
memory  are  required  for  the  loader.  The  data  base  file  is  assumed  to 
reside  on  a  file  named  "TAPEO".  For  append-mode  runs,  the  file  TAPEO 
should  initially  contain  a  copy  of  an  existing  data  base.  For  initial¬ 
mode  runs,  the  system  control  sequence 

FETCH, SLOAD,CAMK. 

ATTACH, S INPUT, MY INPUT, ID=. . . 

S LOAD, S INPUT 

CATALOG, TAPEO, MYDATABASE, ID=. . . 

will  run  the  loader  and  save  the  data  base  on  a  permanent  disk  file. 

Similarly,  for  an  append-mode  run,  the  system  control  sequence 

FETCH, SLOAD.CAMK. 

ATTACH, SINPUT, MYINPUT, ID=. . . 

ATTACH , OLDDB , MYDATABAS  E , ID= . . . 

REQUEST, TAPEO, *PF. 

COPYBF , OLDDB , TAPEO . 

SLOAD, SINPUT. 

CATALOG, TAPEO, MYNEWDATABAS E, ID=. . . 

will  run  the  loader  and  save  an  updated  copy  of  the  previous  data  base  on 
a  permanent  disk  file. 


EDITOR/LOADER  EXAMPLE 

To  introduce  the  prospective  user  to  the  techniques  that  are 
necessary  for  running  the  STAGING  text  editor  and  the  STAGING  data  base 
loader,  a  complete  EDITOR/LOADER  example  will  be  discussed  in  this 
section.  This  example  begins  with  an  analysis  program  run  and  includes 
the  subsequent  procedure  steps  that  are  necessary  to  display  the  model 
and  the  analysis  results  with  the  STAGING  program.  Because  of  the 
flexibility  of  the  editor  and  loader,  any  example  will  be  just  one  of 
many  possible  procedure  sequences  that  will  lead  to  the  same  results.  The 
choice  of  procedures  is  determined  primarily  by  the  format  of  the  data 
produced  by  the  analysis  program.  The  editor  is  used  to  transform  the 
format  given  by  the  analysis  program  into  one  that  can  be  recognized  by 
the  loader.  This  includes  the  insertion  of  header  cards  to  properly 
identify  the  various  types  of  data.  In  keeping  with  the  order  established 
elsewhere  in  this  report,  the  editor  example  will  be  discussed  before  the 
loader  example.  The  reader  is  encouraged  to  page  forward  to  the  loader 
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1 

I 

4 

example  whenever  he  needs  clarification  of  the  author's  reasons  for 
choosing  a  particular  editing  operation. 

A  FINITE  ELEMENT  ANALYSIS  PROBLEM 

The  complete  printer  output  file  produced  by  a  static  analysis  run 

3 

using  the  NASTRAN  finite  element  structural  analysis  program  is 
reproduced  on  the  pages  that  follow.  (Note  that  the  printer  control 
characters  which  govern  pagination  and  line  spacing  have  also  been 
included  in  this  listing  of  the  file.)  For  this  type  of  run  NASTRAN 
requires  that  node-type  data  be  given  on  "RINGAX"  cards,  that  conical 
finite  elements  be  defined  on  "CCONEAX"  cards,  and  that  loading  data  be 
given  on  "PRESAX"  cards.  Displacement  results  have  been  calculated  for 
all  nodes,  but  the  results  are  nonzero  for  only  the  zeroeth  harmonic. 

Stress  results  have  been  calculated  only  for  elements  15  and  35. 
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MPYAD--NULL  MATRIX  PRODUCT 

mpyao—null  matrix  product 

METHOD  2  NT.NBR  PASSES  *  1.EST.  TImE 


mpyad — null  matrix  product 
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EDITOR  COMMAND  SCRIPT 


A  file  of  editor  commands  which  can  be  used  to  reformat  these 
analysis  results  is  given  below.  It  is  assumed  that  the  analysis  results 
are  stored  on  the  file  "OUTPUT"  and  that  the  editor  commands  are  stored 
on  the  file  "SCRIPT".  The  editor  would  be  invoked  by  the  system  command: 
EDIT,  OUTPUT .SCRIPT. 

This  command  makes  a  working  copy  of  the  file  "OUTPUT"  and  positions  the 
current  line  pointer  to  the  first  line.  Commands  preceded  by  a  number  in 
parentheses  are  discussed  at  the  end  of  this  section.  The  results  of 
this  editor  run  are  presented  in  the  next  section  along  with  a  description 
of  the  loader  commands  which  have  been  inserted. 

(1 )  /ENDDATA/ ,$  D 

(2)  X  /RINGAX/  D 

(3)  G  /RINGAX/  C//19H/ 

(4)  G  /RINGAX/  D 

(5)  0  I 

SET  .ELEMENTS, INITIAL 
VARIABLE,  NAME,  MATERIAL,  NODE.  NODE 
LUHb : ANT ,  TYPE ,  *RING  CNICL4 
SET,  NODES,  INITIAL 

VARIABLE,  NAME,  X-CORD,  Z-CORD,  $BAL  UT« 

CONSTANT.  CORD-SYSTM,  1,  Y-COtTi.  0.  MbT -L00RD ,  1 
BEGIN  DATA 

(6)  . 

( 7 }  4  1 

ENDDATA 

(8)  . 

(9)  \SET\,  .  K  . 

(10)  \SET\+1  C  /NAME/SKIP/ 

(11)  .+1  I 

CONSTANT,  NAME,  1000 
INDEX,  NAME,  1 

(12)  U  SINPUT 

(13)  E 

/ENDDATA/, *  D 

(14)  X  /CC0NEAX/  D 

G  /CC0NEAX/  C//S0N/ 

G  /CC0NEAX/  D 
0  I 

SET,  ELEMENTS,  INITIAL 
VARIABLE,  NAME,  MATERIAL,  NODE,  NODE 
CONSTANT,  TYPE,  4RING  CNICL4 
BEGIN  DATA 

%  l 
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ENDDAT A 


U  SINPUT 

(15)  E 

(16)  1,/D  ISPLACEMENT/  +  4D 

(17)  12  *1  *0.0  *0.0  *0.0  /.  *  D 

( 1 8 >  G/  */  C//  /  6 

( (V)  0  l 

SET,  NODES 

VARIABLE,  NAME  SKIP,  *X  DISP*,  *Y  DISP*,  »Z  DISP* 

VARIABLE,  X -ROT AT  I  ON, Y -ROT AT  I ON, Z-ROT AT  ION 
BEGIN  DATA 

♦  I 

ENDDATA 

(20)  \SET\.  .  K  . 

\SET\+1  C/NANE/SKIP/ 

.♦1  I 

CONSTANT,  NAME,  1000 
INDEX,  NAME ,  1 

• 

U  SINPUT 
E 

(21)  1,/L  0  A  D  VECTOR/  +  3D 

(22)  / ! 1 / , $  D 

(23)  G/  */C//  / G 
0  I 

SET,  NODES 

VARIABLE,  NAME,  SKIP,  X-FORCE,  Y-FORCE,  Z-FORCE 
VARIABLE,  X-NOHENT,  Y-HOMENT,  Z-HOHENT 
BEGIN  DATA 

*  I 

ENLDATA 

U  SINPUT 
E 

1,/S  TRESSES/  +3D 
.♦2,  /  35  /-I  D 
.+2,*  D 
G/l’/C //  / 

G /  */C //  / G 

0  I 

SET,  ELEMENTS 

VARIABLE,  NAME ,  SKIP,  SKIP,  *X  N  STRESS*,  BY  N  STRESS*,  *Z  N  STRESS* 
VARIABLE,  SKIP,  *X  S  STRESS*,  *Y  S  STRESS*,  *Z  S  STRESS* 

BEGIN  DATA 

*  I 

ENDDATA 

U  SINPUT 
Q 
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The  numbered  command  lines  have  the  following  effects: 

(1)  Delete  the  first  line  that  contains  "ENDDATA"  and  all  subsequent 
lines  in  the  working  file. 

(2)  Delete  all  lines  except  those  that  contain  "RINGAX". 

(3)  Split  each  line  after  the  character  string  "RINGAX". 

(4)  Delete  all  lines  containing  "RINGAX". 

(5)  Insert  the  text  that  follows  at  the  beginning  of  the  file  (a  "1  B" 
command  could  also  have  been  used) . 

(6)  End  of  text  to  be  inserted. 

(7)  Insert  the  text  that  follows  at  the  end  of  the  file. 

(8)  End  of  text  to  be  inserted. 

(9)  Copy  the  text  from  the  first  previous  line  containing  "SET"  through 
the  current  line  and  insert  it  after  the  current  line  (which  is  also  the 
last  line) . 

(10)  The  current  line  is  the  last  line  of  the  file.  On  the  line  following 
the  first  previous  line  containing  "SET",  change  "NAME"  to  "SKIP". 

(11)  Insert  two  lines  of  text  after  the  line  following  the  last  line 
changed . 

(12)  Write  the  current  contents  of  the  working  file  to  the  file  "SINPUT", 
which  is  being  used  to  accumulate  the  loader  input. 

(13)  Clear  the  working  file  and  read  a  fresh  copy  of  the  f tle  "OUTPUT". 

(14)  As  in  the  commands  (1)  through  (4) ,  retain  only  the  numeric  data 

on  the  "CCONEAX"  lines.  Add  this  data  to  the  loader  input  file  with  the 
necessary  header  information. 

(15)  Restore  an  unedited  copy  of  "OUTPUT". 

(16)  Delete  all  lines  from  the  beginning  of  the  file  to  the  start  of 
displacement  information. 

(17)  Starting  with  the  first  displacement  line  that  is  all  zero,  delete 
the  remainder  of  the  file.  This  command  begins:  Locate  the  character 
string  which  begins  with  a  "2"  followed  by  one  or  blanks,  followed  by  a 
"1"  followed  by  one  or  more  blanks,  etc. 

(18)  Replace  any  string  of  one  or  more  blanks  by  just  one  blank. 

(19)  Insert  header  information  at  the  beginning  of  the  file. 

(20)  Make  a  copy  of  the  displacement  data  as  was  done  for  the  node 
definitions  in  commands  (9)  through  (12) . 


21 


(21)  Delete  lines  preceding  the  load  data  from  a  fresh  copy  of  the  file 
"OUTPUT" . 

(22)  Delete  the  lines  beginning  with  the  new  page  following  the  load  data 
through  the  end  of  the  file.  (Most  printer  output  files  have  special 
control  codes  stored  in  the  first  character  position  of  each  line.  Here 
the  character  "1"  indicates  the  beginning  of  a  new  page.  The  string 
"PAGE"  could  also  have  been  used  to  identify  the  same  line.) 

(23)  Delete  the  first  character  of  each  line.  In  the  stress  output,  a 
printer  control  code  of  "0"  has  been  used  to  cause  double  spacing  of 
certain  lines.  The  "go  to  next  line"  control  code,  which  is  a  blank 
character,  appears  on  most  lines  and  could  have  been  ignored.  Here  all 
control  codes  have  been  deleted. 


LOADER  COMMANDS  AND  LOADER  DATA 

A  file  of  loader  commands  and  loader  data,  which  can  be  used  to 
create  a  STAGING  data  base  for  the  sample  analysis  run,  is  given  below. 
It  is  assumed  that  these  commands  will  be  stored  on  the  file  "SINPUT" 
and  that  the  loader  will  be  invoked  by  the  system  commands: 

SLOAD.  or 


SLO AD, SINPUT. 


which  are  equivalent. 

Both  INITIAL  and  APPEND  mode  loading  are  included  in  this  example. 
A  somewhat  contrived  example  of  the  loader's  indexing  capability  has 
been  included  for  illustration  purposes.  The  given  analysis  run  would 


not  normally  require  this  feature. 

This  loader  run  will  create  a  STAGING  data  base  of  the  file  "TAPEO" 
which  must  be  retained  as  a  system  permanent  file  for  later  display  by 
STAGING. 

Commands  and  data  lines  that  are  preceded  by  numbers  in  parentheses 
are  discussed  at  the  end  of  this  section. 


(1)  SET, ELEMENTS, INITIAL 

VARIABLE,  NAME,  MAItKlAL,  NODE.  NODE 
CONSTANT,  TYPE,  tRING  CNICLI 

(2)  SET,  NODES,  INITIAL 

<3)  VARIABLE,  NAME,  X-CORD,  Z-CORD,  *BAL  UT* 

(4)  CONSTANT.  CORn-blbin,  1,  Y-CORD,  0,  DISP-COORD,  1 
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(5) 

BEGIN  DATA 

2 

57.5 

.0 

46 

3 

58.75 

.0 

46 

5 

60. 

.0 

4 

10 

60. 

4. 

4 

15 

60. 

8. 

4 

20 

60. 

12. 

4 

25 

60. 

16. 

4 

30 

60. 

20. 

4 

7C, 

60. 

24. 

4 

40 

60. 

28. 

4 

r 

42 

57.5 

32. 

46 

43 

58.75 

32. 

46 

45 

60. 

32. 

4 

*. 

50 

60. 

36. 

4 

V 

k 

55 

60. 

40. 

M 

60 

60. 

44. 

4 

65 

60. 

48. 

3452 

* 

FNFlTlATt' 

i  A  > 

CFT.  RuliES,  INITIAL 

(?) 

VARIABLE,  SKIP, 

X-CORD,  Z 

-CORD,  IBAL  UT$ 

r 

CONSTANT,  CORD- 

SYSTH,  1, 

Y-CORD,  0,  DISP-COORD, 

1 

(8) 

CONSTANT,  NAME, 

1000 

(9) 

INIU.X,  NAME,  1 

(10) 

BEGIN  DATA 

2 

57.5 

.0 

46 

3 

58.75 

.0 

46 

- 

5 

60. 

.0 

4 

*  - 

10 

60. 

4. 

4 

15 

60. 

8. 

4 

20 

60. 

12. 

a 

C  J 

60. 

16. 

4 

30 

60. 

20. 

4 

■ 

35 

60. 

24. 

4 

40 

60. 

28. 

4 

42 

57.5 

32. 

46 

43 

58.75 

32. 

46 

45 

60. 

32. 

4 

50 

60. 

36. 

4 

55 

60. 

40. 

4 

An 

60. 

44. 

4 

65 

60. 

48. 

3452 

ENDDATA 

(11 ) 

SET,  ELEMENTS, 

INITIAL 

(12) 

VAHABLE,  NAME, 

MATERIAL, 

NODE,  NODE 

(13) 

CONSTANT,  TYPE, 

♦RING  CNICL* 
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BEGIN  DATA 

2  4 

2 

3 

3 

4 

3 

5 

5 

3 

5 

10 

10 

3 

10 

15 

15 

3 

15 

20 

3 

20 

25 

25 

3 

25 

30 

30 

3 

30 

35 

35 

3 

35 

40 

44 

3 

40 

45 

42 

4 

42 

43 

43 

4 

43 

45 

45 

3 

45 

50 

50 

3 

50 

55 

55 

3 

55 

60 

60 

3 

60 

65 

ENDDATA 

SET,  NODES 
VARIABLE,  NAHE, 

SKIP, 

♦  X  Dll 

VARIABLE,  X-ROTATI0N, Y-ROTATION,Z-RQTATION 
(17)  BEGIN  BATA 


2  0  -9. 1 18936E-0S  0.0 

3  0  -9.06221 6E-05  0.0 
5  0  -9. 010 75 1E-0 5  0.0 


10 

15 

20 

25 

30 

35 

40 

42 

43 
45 
50 
55 
60 


-3.63071 7£— 05  0.0  - 
-3.189937E-05  0.0  - 
751  779t-otJ  0.0  - 
0  -2.556372E-05  0.0 
-2 . 333901 E -05  0.0 
-2.095868E-05  0.0 
-1.852483E-05  0.0 
-1.609989E-05  0.0 
-1 . 37^601 E-05  0.0 
-1 . 1 43988E-05  0.0 
-9.7452/5F-04  0.0 
-9.246740E-06  0.0 
-9.2481 97E-0A  0.0 
-7.056703E-06  0.0 
-4.772603E-06  0.0 
-2.40661 7E-06  0.0 


-1.052826E-04  0. 

-1 . 1 61 534E-04  0. 

- 1 .21 021 0E-04  0. 

- 1 . 21 B593E-04  0. 

-1.202955E-04  0. 

-1.1 67751 E-04  0. 

-1.11 731 4E-04  0. 

-1 .095846E-04  0. 

- 1 . 089030E-04  0. 

-1.082845E-04  0. 

-1.11 7000E-04  0. 

-1.1 65694E-04  0. 

-1 .196707E-04  0. 

-1  . 206558E-04  0.0  0.0  0.0  O.u  0.0 


3.537418E-06 
3,51541 2E-06 
3 . 495443E-06 
-3.469719E-0A 
-1 .91711 OE-06 
-6.292796E-07 
1.275398E-07 
6.374756E-07 
1 . 1 1 2742E-06 
1 . 272038E-06 
1 .175702E-09 
1 . 1 68388E-09 
1 . 161 751 E -09 
-1 .251518E-06 
-1 .040575E-06 
-5.02901 2E-07 


65 
ENDDATA 

(18)  SET,  NODES 

VARIABLE,  SKIP,  SKIP, 
VARIABLE.  X-ROTATION.Y 
LUf.blANT,  NAME,  1000 
INDEX,  NAME,  1 
BEGIN  DATA 


IX  DISPI,  IY  DISPI,  IZ  D ISP* 
-ROTATION, Z-ROTOT  iflN 


0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 


2  0  -9.11 8936E-05  0.0  -3.630717E-05  0.0  -3.537418E-06  0.0 

3  0  -9.062216E-05  0.0  -3 . 1 89937E-05  0.0  -3 .51 541 2E-06  0.0 
5  0  -9 . 01 0751 E-05  0.0  -2.751 779E-05  0.0  -3 .495443E-06  0.0 
10  0  -1 .052826E-04  0.0  -2 . 556372E -05  0.0  -3.469719E-06  0.0 
15  0  - 1 . 1 61 534E-04  0.0  -2 . 333901 E-05  0.0  - 1 .91711 0E-06  0.0 


1 


24 


20  v  -1.21021 0E-04  0.0  -2.095868E-05  0.0  -6.292796E-07  0.0 

25  0  -1.218593E-04  0.0  -1 .852483E-05  0.0  1.275398E-07  0.0 

30  0  -1  .?A?V55t-04  0.0  -1 .609989E-05  0.0  6.374756E-07  0.0 

35  0  -1.167751E-04  0.0  -1 . 372601 E-05  0.0  1.112742E-04  0.0 

40  0  -1 .117314E-04  0.0  -1  .1  43Vo8E-05  0.0  1.272038E-06  0.0 

42  0  -1 .095846E-04  0.0  -9 . 245275E-06  0.0  1.175702E-09  0.0 

43  0  - 1  . 089030E-04  0.0  -9 . 246740E-06  0.0  1.168388E-09  0.0 

45  0  -1  .082845E-04  0.0  -9 . 2481 97E-06  0.0  1.161 751 E-09  0.0 

50  0  -1.1 1 70o0fc-04  0.0  -7.056703E-06  0.0  -1 .251518E-06  0.0 

55  0  -1  .165694E-04  0.0  -4 . 772603E-06  0.0  - 1 . 040575E-06  0.0 

60  0  v.j  -2.40661 7E-06  0.0  -5.02901 2E-07  0.0 

65  0  -1 .206558E-04  0.0  0.0  0.0  0.0  0.0 

ENDDATA 

(19)  SET,  NODES 

VARIABLE,  NAME ,  SKIP,  X-FORCt,  : -FORCE ,  Z-FORCE 
VARIABLE,  X-hOHENT,  Y-NONENT,  Z-HOMENT 
BEGIN  DATA 

5  0  -7 .539822E+02  0.0  0.0  0.0  0.0  0.0 
10  0  -1 .507964E+03  0.0  0.0  0.0  0.0  0.0 

15  0  -1 .507964E+03  0.0  0.0  0.0  0.0  0.0 

20  0  -1  .507964E  +  03  0.0  V.u  0.0  0.0  0.0 

25  0  - 1  .507964E  +  03  0.0  0.0  0.0  0.0  0.0 

30  0  -1.507964E+03  0.0  0.0  0.0  0.0  0.0 

35  0  -1  .507964E+O3  0.<"  o.A  0.0  -j.o  o.O 

40  0  -1 .507964E+03  0.0  0.0  0.0  0.0  0.0 

45  0  - 1  . 507964E  +  03  0.0  0.0  0.0  0.0  0.0 

50  0  -1  .507964E+03  0.0  O.-i  0.0  0.0  0.0 

;5  0  - 1  . 507964E  +  03  0.0  0.0  0.0  0.0  0.0 

60  0  -1 .507964E»03  0.0  0.0  0.0  0.0  0.0 

65  0  -7.539822E+02  0.0  0.0  0.0  0.0  0.0 

ENDDATA 

(20)  SET,  ELEMENTS 

VARIABLE,  NAME,  SKIP,  SKIP.  *X  N  STRESS*.  *Y  N  STRESS*,  *Z  N  STRESS* 
VHh'.'<BLE,  SKIP,  *X  S  STRESS*,  *Y  S  STRESS*.  *Z  S  STRESS* 

BEGIN  DATA 

15  0  -5.000000E  -01  -1 .5151 42E+01  -6 . 4 1 6O99F+0 1  0.0 
c, .  OOftOiint  -01  1  . 508066E+01  -5.5091  36E+01  0.0 
35  0  -5.000000E-01  -1 .008167E+01  -6 .01 9096E+0 1  0.0 
5 . OOOOOOE-Ol  1  . 007292E  +  01  -5.414459E+01  0.0 
ENDDATA 
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The  numbered  command  and  data  lines  have  the  following  effects: 

(1)  For  initial  mode  loading,  all  node  and  element  attributes  must  be 
defined  prior  to  any  actual  data  loading.  This  is  the  beginning  of  a 
dummy  set  that  defines  the  element  attributes.  The  actual  data  set 
begins  at  line  (11) . 

(2)  Beginning  of  the  first  set  of  node  point  data. 

(3)  Five  items  are  to  be  read  from  each  data  record:  The  node  ID  or 
NAME,  the  x-coordinate,  the  y-coordinate ,  the  z-coordinate ,  and  a  number 
indicating  the  degrees  of  freedom  which  are  to  be  constrained  at  the 
node.  STAGING  does  not  have  an  attribute  name  which  directly  relates  to 
the  last  quantity,  so  an  unused  attribute  name,  "BAL  WT",  was  chosen  to 
identify  the  constraints. 

(4)  All  nodal  coordinates  and  displacements  are  given  in  the  same 
rectangular  coordinate  system,  "1".  (These  specifications  are  mandatory 
since  STAGING  has  no  default  coordinate  system.)  The  y-coordinate  value 
is  to  be  set  to  zero  for  all  nodes. 

(5)  Node  point  data  given  in  the  format  produced  by  NASTRAN  (card  names 
removed) . 

(6)  Beginning  of  second  set  of  node  point  data. 

(7)  This  data  set  is  the  same  as  the  first  set,  except  that  the  user  will 
assign  node  ID's  for  each  data  record.  Thus  the  first  data  field  of  each 
record,  the  original  ID,  is  to  be  skipped. 

(8)  Begin  the  new  node  ID's  with  the  number  1000. 

(9)  Increment  the  new  node  ID's  by  one  (for  nodes  1001  through  1016). 

(10)  Node  point  data — identical  with  line  (5) . 

(11)  Beginning  of  a  set  of  element  definitions. 

(12)  Four  items  are  to  be  read  from  each  data  record:  The  element  ID,  the 
material-type  code,  and  the  ID's  of  the  two  nodes  which  the  element 
connects . 

(13)  All  elements  are  the  "RING  CNICL"  type. 

(14)  Element  data  given  in  the  format  produced  by  NASTRAN  (card  names 
removed) . 

(15)  Beginning  of  a  set  of  nodal  displacement  data.  This  data  must  be 
loaded  using  the  append  node  since  the  set  of  data  attributes  has  changed. 
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(16)  Each  data  record  will  contain  eight  data  fields.  The  second  field, 
which  contains  the  harmonic  number  (a  zero),  is  to  be  skipped. 

(17)  Nodal  displacement  data  given  in  the  format  produced  by  NASTRAN, 
except  that  the  extra  blank  characters  between  data  fields  have  been 
removed  to  compress  the  width  of  this  listing. 

(18)  Nodal  displacement  data  set  for  the  nodes  1000  through  1016. 

(19)  Data  set  of  loads  to  be  applied  at  node  points. 

(20)  Stress  data  set  for  elements  15  and  35.  The  harmonic  number  and 
fiber  distances  are  to  be  skipped.  The  element  stress  attribute  names 
are  given  new  interpretations  here  in  order  to  accommodate  the  inner  and 
outer  stress  values  produced  by  NASTRAN 's  conical  shell  element.  Note 
that  each  record  is  two  lines  long. 

USING  STAGING  TO  DISPLAY  MODEL  AND  ANALYSIS  RESULTS 

A  few  STAGING  plots  have  been  included  in  this  section  to  illustrate 
the  type  of  graphic  capabilities  one  can  expect  once  a  data  base  has 
been  created  using  the  EDITOR/LOADER.  Figure  2  is  a  STAGING  summary  of 
the  data  base  contents  which  lists  the  various  types  of  data  attributes 
stored  in  this  data  base.  (The  element  attribute  "BAL  WT",  included  in 
the  loader  example,  was  omitted  when  this  example  was  prepared.) 

Figure  3  is  a  composite  piot  of  the  undeformed  and  the  deformed  structure. 
Figure  4  is  an  x-y  plot  of  the  x-displacement  of  the  nodes  vs  the 
z-coordinate  value  of  the  node. 
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STRUCTURE  COUMT- 


Figure  2  -  STAGING  Data  Base  Statistics  for  the  Sample  Problem 


LOADING  AND  MAINTAINING  THE  PROGRAMS 


The  STAGING  editor  and  loader  programs  are  written  in  a  FORTRAN 

? 

language  variant  called  RATFOR  which  is  described  in  Software  Tools. 

The  RATFOR  preprocessor  translates  block-structured  FORTRAN  code  into 
standard  FORTRAN  which  can  be  compiled  using  standard  system  compilers. 
Editor  and  loader  program  modifications  have  been  partitioned  into  two 
phases:  subprogram  library  maintenance  and  relocatable  loading.  Sub¬ 
program  maintenance  includes:  (1)  Source  program  library  changes  using  the 
UPDATE  utility,  (2)  RATFOR  precompilation  and  FORTRAN  compilation  using 
the  FTN  optimizing  compiler,  and  (3)  Object  library  maintenance  using  the 
EDITLIB  utility.  Relocatable  loading  is  accomplished  using  the  standard 
system  loader  along  with  appropriate  object  libraries.  Both  the  editor 
and  the  loader  require  the  library  DATAMAN  which  contains  the  lowest  level 
data  base  subroutines  used  by  STAGING.  All  necessary  programs  and 
libraries  are  included  on  the  program  distribution  tape,  which  is 
described  in  Appendix  E. 

UPDATING  THE  TEXT  EDITOR 

The  following  control  language  sequence  can  be  used  to  modify  the 
STAGING  text  editor  libraries.  The  source  program  changes  should  be 
prepared  in  CDC/UPDATE  format  and  stored  on  a  system  permanent  file  named 
EDITIN.  The  file  EDITPL  is  the  source  program  library  in  UPDATE  format. 
The  file  EDITLB  is  the  object  program  library  in  CDC/EDITLIB  format. 


.PROC,EDITUP. 

RETURN, EDIT  IN r0LDPL ,NEUPL, RATFOR. 
RETURN, EDITPL,COHPILE,FTO, LOO, EDITLB. 
FETCH, EDITIN, CAHK. 

REQUEST, NEUPL,*PF. 

DISCONT, OUTPUT. 

ATTACH, OLDPL, EDITPL, ID-CAHK. 

UPDATE, N,P,1»EDITIN. 

ATTACH, RATFOR. 

RATFOR, CONPILE,FTO. 
FTN,1«FT0,0PT«2,EL»A. 

FETCH, EDITLB, CANK. 

REWIND, DATA. 

EDITLIB, I«DATA. 

CATAL08 ,NEWPL , EBITPL , ID-CANK . 
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EXTEND, EDITLB. 

PURGE, OLDPL. 

PURGE ,EDITIN . 

EXIT,U. 

RETURN, DAT A, EDIT  IN, OLDPL, NEUPL,RATFOR. 
RETURN, EDITPL, COMPILE, FTO,LGO, EDITLB. 
REVERT. 

.DATA, DATA. 

LIBRARY (EDITLB, OLD) 

REPLACED, LGO) 

FINISH. 

ENDRUN. 


CREATING  AN  EXECUTABLE  VERSION  OF  THE  EDITOR 

The  following  control  language  sequence  can  be  used  to  create  an 
executable  version  of  the  editor  on  the  file  ED.  The  main  program,  EDIT, 
is  explicitly  loaded  from  the  EDITLB  library  to  initiate  the  automatic 
loading  of  all  other  subroutines.  The  subroutine  REMARK  is  also 
explicitly  loaded  to  avoid  conflicts  with  a  FORTRAN  library  routine  that 
has  the  same  name. 


.PROC.EDITLD. 

RETURN, EDITLB, ED, DATANAN. 

ATTACH, EDITLB, ID=CAHK. 

ATTACH, DATANAN, CANVNEULIB, ID=CAHV. 
HAP, -PART. 

PURGE, ED, ID=CAMK,PU=XR. 

LDSET ,LIB=EDIT LB/D ATAMAN . 

LIBLOAD, EDITLB, EDIT. 

LIBLOAD, EDITLB, REMARK. 

N0G0,ED. 

CATALOG, ED, ID*CANK,PU*XR,XR*XR. 
RETURN, EDITLB, ED, DATANAN. 

REVERT. 


UPDATING  THE  DATA  BASE  LOADER 

The  following  control  language  sequence  can  be  used  to  modify  the 
STAGING  data  base  loader  libraries.  The  source  program  changes  should  be 
prepared  in  CDC/UPDATE  format  and  stored  on  a  system  permanent  file  named 
SLOADIN.  The  file  SLOADPL  is  the  source  program  library  in  UPDATE  format. 
The  file  SLOADLB  is  the  object  program  library  in  CDC/EDITLIB  format. 


.PROC  ,SLOADUP. 

RETURN, SLOADIN, NEUPL, SLOADPL, COMPILE. 
RETURN, R ATFOR, FTO ,LGO, SLOADLB. 

FETCH, SLOADIN.CAHK. 

FETCH, SLOADPL,CANK. 

REQUEST, NEWPL,«PF. 

UPDATE, P=SLOADPL,N,I=SLOADIN. 

ATTACH, RATFOR. 

RATFOR,CONPILE,FTO. 

FTN,I*FTO,OPT»2,EL»A,R*3. 

ATTACH, SLOADLB, ID'CANK. 

REWIND, DATA. 

EDITLIB, I=DATA. 

CATALOG, NEUPL, SLOADPL, ID=CAHK. 

EXTEND, SLOADLB. 

DISCARD, SLOADIN. 

DISCARD, SLOADPL. 

EXIT(U) 

RETURN, SLOADIN, NEUPL, SLOADPL, COHPILE. 
RETURN, RATFOR, FTO,lGO, SLOADLB, DATA. 
REVERT. 

.DATA, DATA. 

LIBRARY (SLOADLB, OLD) 

REPLACE <*,LGO> 

FINISH. 

ENDRUN. 


CREATING  AN  EXECUTABLE  VERSION  OF  THE  LOADER 

The  following  control  language  sequence  can  be  used  to  create  an 
executable  version  of  the  data  base  loader  on  the  file  SLO.  The  main 
program,  SLOADR,  is  explicitly  loaded  from  the  SLOADLB  library  to 
initiate  the  automatic  loading  of  all  other  subroutines.  The  subroutine 
REMARK  is  also  explicitly  loaded  to  avoid  conflicts  with  a  FORTRAN 
library  routine  that  has  the  same  name.  The  routines  DMINIT  and  DMSTGT 
are  explicitly  loaded  from  the  library  DATAMAN  to  properly  position 
COMMON  areas.  The  libraries  SUPLIB  and  GENERLB  contain  successively 
higher  level  data  base  manipulation  subroutines.  The  loader  and  editor 
use  common  error  message  routines  which  are  a  part  of  the  EDITLB  library. 


.PR0C,SL0ADLD. 

RETURN, DATAHAN, EDITLB, GENERLB 
RETURN, SUPLIB, SLOADLB, SLO. 
ATTACH, EDITLB, ID=CAHK,NR«1 . 
ATTACH, GENERLB, ID*CAHK,NR=1 . 
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ATTACH, BUPLIB,FELIB,ID«CARK,HR*1. 
ATTACH, SLOADLB, ID*CAHK, MR=1 . 

ATTACH, DATAHAN,CAHVNEULIB,ID«CAHV. 
PURGE, SLO,SLOAD,ID=CAHK,PU=XR. 

HAP, PART. 

LDSET, LIB»SLOADLB/EDITLB. 

LDSET ,LIB=GENERLB . 

LDSET, L I B=D AT AH AN. 

LDSET  ,LIB=SUPLIB. 

LIBLOAD, SLOADLB, SLOADR. 

LI8L0AD,EDITLB, REHARK. 

LIBLOAD, DATAHAN,DHINIT. 

LIBLOAD, DATAHAN,DHSTGT. 

NOGO,SLO. 

CATAL06,SLO,SLOAD,ID=CAHK,PU=XR,XR=XR. 
RETURN, DAT AHAH,EDITLB,GENERLB. 

RETURN, SUPLIB, SLOADLB, SLO. 

REVERT. 


ACKNOWLEDGMENTS 

The  author  wisnes  to  thank  Peter  N.  Roth  for  introducing  us  to 

2 

the  wealth  of  programs  and  techniques  described  in  Software  Tools. 

The  preliminary  work  done  on  che  text  editor  by  Mr.  Roth  and  Mr.  Melvin  E. 
Haas  is  greatly  appreciated. 


34 


i 


APPENDIX  A 

SUMMARY  OK  TEXT  EDITOR  COMMANDS 


Sunnarv  nt  co-wands  for  the  STAGING  text  editor:  EDIT 


B 

C 


D 


F. 


F 


G 


I 


k 


n 


o 

R 


o 


Insert  following  lines  before  current  line 
<to>  B  (lines  follow,  end  with  .) 

Change  Text  Fragment 

<.f  ron>,<to>  C  'del  inXpattern  >< del lnXrep lacenent Xde  1  in  :'G‘  <P  - 
.  ,  .  C  <last  pattern/  .=  last  line  changed 

Delete  Lines 

<f ron> , <to>  D  <N>  <P> 

.  ,  .  D  1  ,-<fron>-1  after  delete 

Edit  a  File  (Clear  and  Read) 

E  < f i 1 e  nane> 

E  ‘"saved  file  nane>  .  =  1  after  read 


irange  and/or  Display  Edit  File  Nane 
F  or  F  < f 1 1 e  nane> 

(<saved  file  nane>  is  set  to  <file  nane)  and  displayed)  ,  not  changed 
Apply  Connand  Globally 

<tro«>,<to>  G  <delinXpatternXdeli«>  <connand> 

•  1  ,  *  G  <last  pattern/  .  setting  depends  on  Cconnand 

(applies  connand  to  every  line  that  has  a  pattern  natch) 


Input  or  Insert  Lines  fron  the  Terninal 
<to>  I  (lines  follow,  end  with  .) 

I 

f nov  l i ne= 

<f ron> , <to>  K  <to>  <P> 


hove  Lines 

fron:,  tO>  N  <tO>  <P> 

.  ,  ,  H 

Print  Lines 
<fron>,<to'  P 
•  ,  •  P  t 

Quit 

0 

Read  Lines  fron  a  File 
'to>  R  -file  nane> 

.  R  tsaved  file  nane> 


.=  last  1  me  l  nser  ed 


last  line  copied 


.=  last  line  noved 


.=  last  line  printed 


.=  last  line  read 


Substitute  Lines  fron  the  Terninal  (Delete  and  Insert) 
fmn  .  to  S  dines  fnlDt.  end  with  .) 

.  ,  .  S 


.=  last  line  input 


U  Unte  Lines  onto  a  File 
<fron  .  <to>  U  < f i  1  e  nane> 

1  ,  t  U  <saved  file  nane>  .  not  changed 

X  Apply  Connand  Globally  (Exclude) 

<fro«>,<to>  X  <delin><pattern><delin>  <connand> 

t  ,  »  X  <last  pattern'/  .  setting  depends  on  <connand> 

(applies  connand  to  ever  line  that  does  not  have  a  pattern  natch) 


*  Show  Line  Nunber 
<to>  -  <P> 


.=<to>  after  display 


<CR>  Print  Next  Line  (sane  as  .+1  P  ) 

<P>  Optional  Print  Line:  P  neans  print,  onitted  neans  don't 

(The  current  line  after  the  execution  of  the  connand  will  be  printed) 

<6>  Optional  Global  Change:  G  neans  global,  onitted  neans  not  global 

(The  change  will  be  applied  to  all  occurances  of  <pattern>  in  the  line/s) 

(delin>  Any  desired  character  (except  blank) 

'saved  file  nane>  The  saved  file  nane  is  the  file  nane  used  in  the  E  connand, 
or  the  first  file  nane  given  in  an  K  connand  if  E  is  not  used,  or 
the  nane  given  in  the  last  F  connand. 

Text  Files 

A  naxinun  of  six  files  nay  be  used  during  one  edit  session.  All  files  to 
be  used  mist  be  included  on  the  execution  control  card  or  be  one  of  the 
following  default  nanes:  EFILE,  Ft,  F2,  F3,  F4,  SINPUT.  File  nanes 
listed  on  the  execution  control  card  replace  corresponding  file  nanes 
in  the  default  list. 

All  text  files  will  be  rewound  prior  to  any  read  operation.  All  text 
files,  except  the  file  naned  STNPUI.  will  be  rewound  prior  to  any  write 
operation. 

Connand  Files 

Editor  connands  can  be  stored  on  a  file  and  used  instead  of  the 
connected  termnal  file  to  direct  the  editor.  For  a  file  to  be  used  as 
a  connand  file  it  mist:  be  positioned  correctly  (e.g.  rewound),  be 
included  in  the  file  list,  not  be  the  first  file  in  the  file  list,  and 
be  naned  INPUT  or  SCRIPT.  If  tile  nanes  INPUT  and  SCRIPT  both  appear 
in  the  file  list,  connands  will  be  read  only  fron  the  first  file  listed. 
Editing  ronnands  will  be  read  fron  the  connand  file  until  an  end-of-file 
nark  is  encountered.  At  that  point  connands  will  be  read  fron  the 
connected  terninal  file. 


Line  Nunbers 
Line  nunbers 

'N> 

0 

1 

% 

/<pattern>/ 

\<pattern’\ 


<fron>  J  <to> 

nay  be  nade  up  of  the  following  conponents 
a  decinal  nunber 

a  non-existant  line  before  the  first 

the  first  line 

the  current  line  nunber 

the  last  line 

a  forward  search  to  t 

a  backward  search  to  1 
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The  I  me  Number  Components  may  be  combined  with  +  or  -  or  ;  to  any  extent 
and  in  any  logical  order: 

.+1  is  the  next  line 
.-t  is  the  previous  line 
t-Z  is  the  Ath  line  from  the  end 
The  operator  ;  resets  the  value  of  .  and  proceeds: 

.+1J.+2  is  the  3rd  line  on  (same  as  .+3) 

/ABC/ ; / ABC/ ; /ABC/  is  the  3rd  line  on  that  has  ABC 
\ABC\ ; \EF G\-4  is  the  4th  line  before  a  line  that  has  an  EFG  that 
is  before  the  line  that  has  ABC  that  is  before  the  current  line 
1 : /ARC/  i'  toe  first  line  in  the  file  that  has  ABC 
$;\ABC\  is  the  last  line  in  the  file  that  has  ABC 

Uhere  two  line  numbers  are  called  for  (<fro«>,<to>) ,  one  number  can  be  given 
to  be  used  for  both.  If  several  are  given,  the  last  2  are  used.  If  no 
line  numbers  are  given,  the  defaults  for  the  particular  command  are  used. 

Search  Patterns:  'pattern) 

Patterns  are  usually  the  string  of  characters  within  a  line  that  is 
wanted.  A  set  of  characters  has  been  defined  to  have  special  meaning 
l r  patterns  to  -’low  more  general  searching: 

7  means  any  character  (F77T  matches  FOOT  or  FEET  or  FA2T,  etc.) 

1  means  the  start  of  the  line  (if  1st  character  in  pattern) 

S  means  the  end  of  the  line  (if  last  character  in  pattern) 

<  >  inclose  a  class  of  characters  (means  "any  ot  these") 

(  < AB>  means  jn  A  or  a  B  ) 

(  <I-N>  means  any  letter  I  thru  N  ) 

<"  >  inclose  a  negated  class  (means  "not  any  of  these") 

<  <  1 -9>  means  any  character  except  a  non-zero  digit  ) 

*  means  zero  or  more  of  the  previous 

(  A«  mean',  zero  or  more  A's,  AA»  means  1  or  more  A's) 

(  <a-ZHA-Z>*  means  one  or  more  letters) 

(  7«  means  any  number  of  characters,  including  none) 

P7  means  7 

P1  means  1 

Pt  means  * 

P{  means  { 

PP  means  3 

etc . 

A  null  pattern  (  'del lm ><del im)  )  means  to  use  the  last  pattern  given. 

A  search  /At  ;//;//  is  the  3rd  line  on  that  has  ABC.  A  command 
/ABC/  C  //EFG/  will  search  for  the  next  line  that  has  ABC  and  change 
the  ABC  to  EFG. 

Replacement  Text:  'replacement) 

Replacement  Text  is  usually  the  string  of  characters  that  is  wanted 
within  the  line.  A  set  of  characters  have  been  defined  to  have  a 
special  meaning  to  allow  more  genera',  replacement: 

S  means  whatever  was  matched  by  the  previous  search 

PS  means  S 

PP  means  P 

*N  means  that  the  rune  it  line  is  to  be  terminated  at  this 

point  and  a  new  line  begun 


Tabs 

The  editor  does  not  have  colunn  tabs,  but  the  indenting  of  blocks  of 
text  can  be  easily  acconplished  using  global  change  facilities.  First, 
select  a  tab  character  and  enter  text  lines  which  begin  with  enough 
tab  characters  to  indicate  the  required  level  of  indentation.  After 
the  text  has  been  entered,  the  following  connand  will  perforn  the 
indenting: 

6/<tab  character>/C//<blanks  to  be  inserted  per  tab>/G 
Line  Truncation 

The  editor  will  truncate  all  long  lines  to  136  characters  with  no 
Messages  being  issued.  The  editor  has  no  other  automatic  truncation 
facility,  but  the  two  following  global  change  connands  will  truncate 
lines  to  any  length. 

G/<?T...?>/C//JBNTRASH/ 

6/ ! TRASH/ D 

where  <??...?>  is  a  string  of  question  narks  defining  the  length  of 
the  truncated  line. 

Invoking  the  Progran 

After  attaching  the  editor  progran  as  file  "EDIT"  (e.g., 

FETCH, EDIT, CAHK  )  the  user  enters  either: 

EDIT  or 

EDIT,  <file1>,  ...,  <file6>,  <infile>,  <outfile>  ;  where 
<filei>  represents  the  nanes  of  optional  text  files  or  connand  files. 
<inf ile>  is  the  nane  of  the  prinary  file  of  editor  connands.  The 
default  for  <infile>  is  "KEYBRD".  <outfile>  is  the  nane  of  the  file 
to  which  all  editor  Messages  are  to  be  written.  The  default  for 
<outfile>  is  "SCREEN".  The  files  KEYBRD  and  SCREEN  will  be  connected 
as  terninal  files  during  an  interactive  run.  The  editor  progran 
requires  about  SOOOO(octal)  words  of  nenory  for  execution. 


APPENDIX  B 

A  SYSTEM  COMMAND  SEQUENCE  FOR  RUNNING  THE  TEXT  EDITOR 


The  following  command  sequence  can  be  used  to  run  the  STAGING  text 
editor.  This  sequence  must  reside  on  a  file  named  EDIT  and  the  editor 
program  must  reside  on  a  system  permanent  file  named  ZZZEDIT.  This  pro¬ 
cedure  is  invoked  with  the  same  system  command  that  is  used  to  run  the 
editor  program  in  the  stand-alone  mode  (e.g.,  EDIT,  <file  list>) .  This 
procedure  sequence  performs  three  functions:  (1)  If  the  first  file  in  the 
file  list  is  a  permanent  file,  that  file  is  copied  to  the  file  PFTEMP  and 
passed  to  the  editor  program;  (2)  All  files  in  the  file  list  (actual  and 
default)  which  are  empty  (not  yet  assigned)  are  assigned  to  system 
permanent  file  units;  (3)  When  the  editor  program  has  been  terminated,  all 
files  which  were  assigned  in  (2),  but  not  used  by  the  editor,  are  deleted. 


.PR0C,EDIT,EFILE>,F1,F2,F3,F4,SINPUT,IN=,0UT=. 
RETURN, ZZZEDIT, EDRNDH. 

FETCH, ZZZEDIT, CAMK. 

IFE  <  SU1 ,SU1 ) 

SIIITCH,  1 . 

ENDIF <SW1> 

IFE<SU2,SU2> 

SWITCH, 2. 

ENDIF(SU2) 

IFE  <  SU3 , SU3  > 

SWITCH, 3. 

ENDIF(SU3) 

IFE(SU4,SW4) 

SWITCH, 4. 

ENDIF (SU4 ) 

IFE<SU5,SU5> 

SWITCH, 5. 

ENDIF (SUS) 

SET,R1630. 

IFE  < .NOT .FILE (FI ,AS) ,ASF1  > 

REQUEST, FI, *PF. 

REWIND, Ft. 

SWITCH,!. 

ENDIF  < ASF1 ) 

IFE  < .N0T.FILE(F2,AS) ,ASF2) 

REQUEST, F2,*PF. 

REWIND, F2. 

SWITCH, 2. 

ENDIF(ASF2) 
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3FE  < .NOT . FILE (F3  r AS  > ,ASF3) 
REQUEST, F3,*PF. 

REMIND, F3. 

SWITCH, 3. 

£NDIF(ASF3) 

IFE< .HOT .FILE(F4,AS> ,ASF4) 

REQUEST, F4,*PF. 

REMIND, F4. 

SWITCH, 4. 

ENDIF(ASF4) 

IF£( .N0T.FILE(S1NPUT,AS> ,ASSINPUT> 
REQUEST, S1NPUT,*PF. 

REMIND, S1NPUT. 

SWITCH, 5. 

ENDIF(ASSINPUT) 

SET  ,R1«FALSE. 
IFE(4EFILE«.E0.*«,EEFILE> 

IFE<FILE (DEFILE, AS), ASEFILD) 
1FE<FILE(QEFILE,PF>,PFB> 
REMIND, DEFILE. 

RETURN, PFTENP. 

REQUEST, PFTENP,*PF. 
REMIND, PFTEHP. 

COPYPF, DEFILE, PFTENP. 
REMIND, DEFILE, PFTENP. 
SET,R1«TRUE. 

ENDIF(PFD) 

ELSE(ASEFILD) 

REQUEST , DEFILE ,*PF . 

REMIND, DEFILE. 

SET ,R16a1 . 

ENDIF< ASEFILD) 

ELSE(EEFILE) 

IFE(FILE(EFILE,AS),ASEFILE) 

IFE(FILE(EFILE,PF),PF) 

REMIND, EFILE. 
RETURN,PFTEHP. 

REQUEST, PFTENP, *PF. 

REWIND, PFTEHP. 

COPYDF, EFILE, PFTENP. 
REMIND, EFILE, PFTEHP. 

SET ,R\sTRUE. 

ENDIF(PF) 

ELSE< ASEFILE) 

REQUEST, EFILE, *PF. 

REMIND, EFILE. 

SET,R16»2. 

ENDIF(ASEFILE) 

ENDIF(EEFILE) 


IFE  <  R 1 ,ENDRUN) 

ZZZEDIT,PFTEHP,F1 ,F2,F3,F4, SINPUT, IN, OUT. 
ELSE(ENDRUN) 

ZZZEDIT ,EFILE,Ft ,F2,F3,F4, SINPUT, IN, OUT. 
ENDIF(ENDRUN) 

EXIT(U) 

1FECSUY ,S1 > 

SWITCH, 1 . 

IFE (FILE <F1 , BOI ),QS1 ) 

RETURN, FI. 

ENDIF  <  BS1 ) 

END I F  <  S 1 ) 

IFE(SU2,S2) 

SWITCH, 2. 

IFE(F1LE(F2,B0I),QS2) 

RETURN, F2. 

EMDIF(0S2> 

ENDIF (S2) 

IFE( SU3,S3) 

SWITCH, 3. 

IFE(FILE(F3,BOI),QS3) 

RETURN, F3. 

EMDIF ( QS3 ) 

ENDIF (S3) 

IFF.(SW4,S4> 

SWITCH, 4. 

IFE(FILE(F4,B0I >,QS4) 

RETURN, F4. 

EMDIF  <  OS4 ) 

ENDIF (S4 ) 

IFE(SU5,S5) 

SWITCH, 5. 

IFE < FILE (SINPUT , BOI > , GS5 ) 

RETURN, SINPUT. 

ENDIF(QS5) 

ENDIF ( S5 ) 

IFE<  R1G.EO. 1 ,S1 1 > 

!FE(FILE(REFILE,BOI ) ,QS1 1 > 

RETURN, BEF1LE. 

EMDIF ( OS  1 1  ) 

ENDIF (St  1 ) 

IFE(R16.EQ.2,S12) 

IFE(FILE(EFILE,B0I),QS12) 

RETURN, EFILE. 

ENDIF<OSf 2) 

ENDIF ( S 1 2  > 

RETURN, ZZZEDIT, EDRNDN. 

RETURN, KEYBRD, SCREEN. 

REVERT. 
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APPENDIX  C 

SUMMARY  OF  DATA  BASE  LOADER  COMMANDS 
Sunnary  of  connands  for  the  STAGING  data  loader:  SLOAD  - 


BEGIN  DATA  -  Data  delimiter  for  a  set  of  data  to  be  loaded 
BEGIN  DATA 
<data  record> 

<data  record> 

ENDDATA 

A  set  of  data  is  conposed  of  2ero  or  nore  data  records. 

CONSTANT  -  Define  values  for  attributes  which  are  to  be  set 
to  the  sane  value  for  each  data  record  processed 
CONSTANT,  <attr.  nane>,  <value>,  ...  ,  <attr.  nane>,  <v«lue> 

ENDDATA  -  £nd-of-run  connand  and  end  deliniter  for  a  set  of  data 

INDEX  -  Set  increment  values  for  indexing  node  and  elenent 
identifiers  and  subscripted  attributes 
INDEX,  <attr.  nane>,  <value>,  ...  ,  <attr.  nane>,  <value> 

If  <attr.  nane>  is  "NAHE"  the  increnent  will  be  applied  to 
the  node  or  element  ID.  Otherwise,  the  increnent  will  be 
applied  to  the  attribute  subscript.  The  default  increnent 
is  zero. 

SET  -  Specifies  loader  nodes  for  a  new  set  of  data 
SET,  NODES  ,  APPEND  ,  PRINT 

ELEMENTS  INITIAL  NOPRINT 

APPEND  -  Defines  a  loader  node  which  will  append  data  to 
an  existing  data  base.  A  copy  of  the  old  data  base 
nust  be  available  on  a  file  naned  “TAPEO".  APPEND 
is  a  default  loader  node. 

ELENENTS  -  Specifies  elenent  data  loading  node  for 
current  data  set. 

INITIAL  -  Specifies  loader  node  which  will  create  a  new 
data  base.  Data  base  will  be  created  on  a  file  naned 
"TAPEO".  INITIAL  node  loading  is  usually  faster  than 
APPEND  node  loading.  The  following  restrictions  apply 
to  INITIAL  node  loading: 

.  All  attributes  nust  be  defined  for  nodes  and  elenents 
before  the  first  data  set  is  loaded.  This 
necessitates  the  creation  of  a  dunny  set  (with 
no  data)  to  define  the  attributes  for  elenents 
(nodes)  when  node  (elenent)  data  is  to  be 
loaded  first.  The  first  BEGIN  DATA  freezes 
the  definition  of  attributes  for  the  INITIAL 
node.  This  data  set  nay  be  null. 

.  At  least  one  elenent  nust  be  defined  even  if 
it  is  not  to  be  used.  The  elenent  "TYPE" 
attribute  nust  also  be  defined,  (these 
restrictions  are  inposed  by  the  current 
versions  of  STAGING.) 

NODES  -  Specifies  node  data  loading  node  for  current 
set.  NODES  is  a  default  loader  node. 
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NOPRINT  -  Inhibits  the  printing  of  subsequent  connand 
records. 

PRINT  -  Causes  printing  of  each  subsequent  connand 
record.  Data  records  are  not  printed.  PRINT  is 
a  default  loader  node. 

VARIABLE  -  Specifies  the  location  of  attributes  within  a  data  record 
VARIABLE,  <attr.  nane>,  ...,  (attr.  nane> 

SKIP  SKIP 

The  order  of  the  attribute  nanes  listed  using  VARIABLE 
connands  deternines  the  position  of  the 
attribute  values  to  be  loaded  within  a  data 
record.  SKIP  indicates  a  data  field  to  be  skipped. 

(attr.  nane>  -  The  nane  of  an  attribute  to  be  referenced 

Only  the  attribute  nanes  listed  in  the  Attribute  Nane  Tables 

in  Appendix  D  will  be  accepted.  Subscripted  attributes 

can  be  defined  using  the  CONSTANT  connand  and  the  INDEX  connand. 

An  attribute  nane  with  a  zero  subscript  is  treated  the  sane  as  an 
attribute  nane  without  a  subscript.  The  attribute  "NANE" 
is  used  to  indicate  the  node  or  elenent  ID.  Attribute  values 
which  have  enbedded  blanks  nust  be  bracketed  by  a  pair  of 
dollar  signs  (e.g.,  (X  DISPt). 

(data  field)  -  One  unit  of  nuneric  data 

Nuneric  data  within  a  field  nust  conforn  to  EORTRAN 
rules  for  1,  F,  or  E  input  fornats.  All  data  will  be 
interpreted  as  real  nunbers  and  rounded  to  integer  values 
as  required.  Default  values  for  null  fields  are  zero. 

Data  fields  to  be  SKIPped  nust  also  conforn  to  FORTRAN 
rules. 

(data  record)  -  A  unit  of  data  which  is  to  be  loaded  in  the  data 
for  one  elenent  or  node 
(data  field),  ...,  (data  field) 

A  data  record  nay  span  several  lines,  each  of  which  nay  be 
up  to  136  characters  long.  Data  fields  within  each  data  record 
nust  be  separated  by  blanks  or  connas.  Within  a  data  set  each 
data  record  nust  contain  the  sane  nunber  of  data  fields.  Each 
data  record  begins  with  a  new  line. 

(value)  -  A  data  constant  which  is  either  a  nuneric  or  character  value. 
Nuneric  values  nust  conforn  to  the  rules  for  data  fields. 

Character  values  which  have  enbedded  deliniters  (blanks,  connas,  etc. 
nust  be  bracketed  by  a  pair  of  dollar  signs  (e.g,,  iNEM  QUAD*). 

Data  Base  Files 

For  APPEND  node  runs.,  a  copy  of  an  existing  data  base  file 
nust  be  nade  to  a  pernanent  file  device  prior  to  running  the 
STAGING  loader.  The  data  base  file  nust  be  naned  "TAPEO". 

After  the  loader  has  conpleted  execution,  the  file  "TAPEO" 
should  be  cataloged  as  a  pernanent  file.  For  INITIAL  node 
runs,  the  user  needs  only  to  catalog  the  file  "TAPEO"  after 
the  run  has  conpleted. 
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Invoking  the  Loader 

After  attaching  the  loader  program  as  file  *SL0ADa  (e.g., 

FETCH, S10AD,CAHK  ),  the  user  enters  either: 

SIOAD  or 

SLOAD,  <infile>  ;  where 

<infile>  is  the  nane  of  the  file  which  contains  the  loader 
connands  and  data.  This  file  will  be  rewound  at  the 
beginning  of  the  job.  The  default  for  the  file  nane  is  "SINPUT". 
Messages  issued  by  the  loader  are  written  to  the  file  “OUTPUT". 
The  file  OUTPUT  will  be  connected  as  a  terninal  file  during 
an  interactive  run.  The  loader  will  terninate  whenever  the 
data  is  exhausted  on  <infile>  or  whenever  an  ENDDATA  connand 
is  encountered  outside  of  a  BEGIN  DAT A/ENDDAT A  data  set. 

The  loader  progran  requires  about  SOOOO(octal)  words  of 
nenory  for  execution. 

Connand  Fornat 

A  connand  line  can  be  up  to  13d  characters  in  length. 

Connands  are  conposed  of  alphanuneric  fields  which  are  delinited 
by  connas  or  blanks.  Connands  nay  not  be  continued  beyond  one 
line,  but  two  or  nore  connands  of  the  sane  type  can  be  used  to 
specify  a  large  nunber  of  connand  fields. 
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APPENDIX  D 

STAGING  DATA  ATTRIBUTE  NAMES 


The  following 
3 

GUIDE  and  include 


tables  have  been  reproduced  from  the  STAGING  USER'S 
all  currently  defined  data  attributes. 
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TABLE  1  -  STAGING  NODE  ATTRIBUTES 


TEMPERATUR  TEM  any 


TABLE  1  (Continued) 
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The  displacement  factors  are  delta  displacements  from  the  node  Point  X,  Y,  A  and  must  be  provided 
in  the  same  coordinate  system.  The  delta  values  can  refer  to  up  to  ten  mode  shapes,  load  conditions,  or 
time  steps.  Only  one  of  these  conditions  (mode  shapes,  load  conditions,  or  time  steps)  can  he  active 


TABLE  2  -  STAGING  ELEMENT  ATTRIBUTES 


No. 

Full  Name 

Attribute 

Name 

Abbreviation 

1 

Type 

TYPE  * 

TYP 

2 

Material  Identifier 

MATERIAL 

MAT 

3 

Area  Cross-Section 

AREA-CRSST 

CSA 

4 

Area  Moment  X**Direction 

X  AREA  MOM 

XAM 

5 

Area  Moment  Y  Direction 

Y  AREA  MOM 

YAM 

6 

Area  Moment  Z  Direction 

Z  AREA  MOM 

ZAM 

7 

Torsional  Constant 

TORSIONAL 

TOR 

8 

Mass/Length 

MASS/LENGT 

MPL 

9 

Membrane  Thickness 

MEM  THICK 

MTH 

10 

Mass/Area 

MASS/AREA 

MPA 

11 

Flexual  Thickness 

FLEX  THICK 

FTH 

12 

Material  Property  A 

MAT- PROP- A 

PRA 

13 

Pressure 

PRESSURE 

PRE 

14 

Temperature 

TEMPERATUR 

TEM 

15 

Critical  Load 

CRIT  LOAD 

CLD 

16 

Design  Criterion 

DES  CRIT 

DCR 

17 

Construction  Code 

CONSTRCODE 

CCD 

18 

Geometry  Class 

GEOMCLASS 

GCL 

19 

Geometry  Sub-Class 

SGE0MCLASS 

SGC 

20 

Angle  Between  Prop-Axes  & 

Side  I-T 

BETA 

BET 

21 

Tension  Allowable  Stress 

TEN  ALWSTR 

TAL 

22 

Compression  Allowable  Stress 

CMP  ALWSTR 

SAL 

23 

Shear  Allowable  Stress 

SHR  ALWSTR 

SAL 

24 

Minimum  Size 

MIN  SIZE 

MIN 

25 

Maximum  Size 

MAX  SIZE 

MAX 

26 

Allowable  Class 

ALOWCLAS  S 

ALC 

27 

Allowable  Sub-Class 

SAL0WCLASS 

SCN 

28 

Average  Stress  Concentration 
Ratio 

STRCNSTR 

STC 

29 

Original  Thickness 

ORIG  THICK 

OTH 

30 

Excluded  Element 

EXCLUD  ELM 

EXE 

31 

Non-Optimum  Weight  Factor 

NOPTWTFAC 

NPW 

32 

Normal  Stress  X  (Centroid) 

X  N  STRESS 

XNS 

33 

Normal  Stress  Y  (Centroid) 

Y  N  STRESS 

YNS 

34 

Normal  Stress  Z  (Centroid) 

Z  N  STRESS 

ZNS 

35 

Shear  Stress  X  (Centroid) 

X  S  STRESS 

XSS 

36 

Shear  Stress  Y  (Centroid) 

Y  S  STRESS 

YSS 

37 

Shear  Stress  Z  (Centroid) 

Z  S  STRESS 

ZSS 

38 

Maximum  Principal  Stress 

MAX  STRESS 

MXS 

39 

Intermediate  Principal  Stress 

I NT  STRESS 

INS 

40 

Minimum  Principal  Stress 

MIN  STRESS 

MNS 

41 

Equivalent  Stress 

EQU  STRESS 

EOS 

*See  Table  3. 

**XYZ — GLOBAL  Cartesian  Coordinate  System. 
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TABLE  3  -  STAGING  ELEMENT  TYPES 


TYPE 

NO. 

FULL  NAME 

SHORTHAND  NAME 

1 

1* - *2 

Rod 

ROD 

2 

1* - *2 

3 

Straight  Beam 

STR  BEAM 

3 

1 

Membrane  Triangle 

MEM  TRIA 

4 

Membrane  Quadrilateral 

MEM  QUAD 

5 

Same  as  3 

Plate  Triangle 

PLATE  TRIA 

6 

Same  as  4 

Plate  Quadrilateral 

PLATE  QUAD 

7 

Same  as  3 

General  Triangle 

GEN  TRIA 

8 

Same  as  4 

General  Quadrilateral 

GEN  QUAD 

9 

Same  as  3 

Ring  Triangle 

RING  TRIA 

10 

Same  as  4 

Ring  Quadrilateral 

RING  QUAD 

11 

Same  as  4 

Shear  Panel 

SHER  PANEL 

12 

Same  as  4 

Twist  Panel 

TWIS  PANEL 

13 

General  Triangle(2) 

GEN  TRIA 2 

1  *!  2 

H  7  3 

14 

•f=5=3‘ 

General  Quadrilateral (2) 

CEN  QUAD 2 

15 

Same  as  13 

Ring  Triangle (2) 

RING  TRIA2 

16 

Same  as  14 

Ring  Quadrilateral (2) 

RING  QUAD 2 

17 

ft, 

l 

Curved  Beam 

CURVE  BEAM 

18 

Same  as  17 

Ring  Shell 

RING  SHELL 

19 

1  — - «  2 

Ring  Conical 

RING  CNICL 
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TABLE  3  (Continued) 


TYPE 

NO.  _  _  FULL  NAME  _ SHORTHAND  NAME 


20 


Tetrahedral  Solid  TETR  SOLID 


Wedge  Solid 


Hexahedral  Solid 


20  Node  Brick 

Axial  Spring 
Torsional  Spring 

Mass 

Damper 

Warped  Quadrilateral 


Hinged  Beam 


WEDG  SOLID 


HEXA  SOLID 


BRICK20 

AXIAL  SPRG 
TORSN  SPRG 

MASS 

DAMPER 

WARP  QUAD 


HINGE  BEAM 


52 


APPENDIX  E 

PROGRAM  DISTRIBUTION  TAPE  DESCRIPTION 


The  text  editor  and  loader  programs  are  distributed  on  an 
800  BPI,  7-track  tape  produced  in  SCOPE  format  on  BTNSRDC'S 
CDC-NOS/BE  operating  systen.  There  are  20  files  on  the  tape 
arranged  as  follows: 


File 

Nunber 

File 

Nane 

Contents 

Fornat 

1. 

EDIT 

Editor  Progran  -  Executable 

Binary 

2. 

SL0AD 

Loader  Progran  -  Executable 

Binary 

3. 

TEST0UT 

Exanple  NASTRAN  Output  file 

Text 

4. 

SINPUT 

Loader  Input  for  Snail  Exanple 

Text 

5. 

SINPUTX 

Loader  Input  for  NASTRAN  Exanple 

Text 

6. 

SCRIPT 

Editor  Connands  for  NASTRAN 

Exanple 

Text 

7. 

INDEXTEST 

Loader  Input  for  Indexing  Exanple 

Text 

8. 

EDITUP 

Editor  Updating  Connand  Sequence 

Text 

9. 

EDITLD 

Editor  Loading  Connand  Sequence 

Text 

10. 

SL0ADUP 

Loader  Updating  Connand  Sequence 

Text 

11. 

SLOADLD 

Loader  loading  Connand  Sequence 

Text 

12. 

RATFOR 

RATFOR  Preconpiler  -  Executable 

Binary 

13. 

EDITPL 

Editor  Source  Progran  Library 

UPDATE  Seq. 

14. 

SLOADPL 

Loader  Source  Progran  Library 

UPDATC  Seq. 

15. 

RATPL 

GENERLB  Source  Progran  Library 

UPDATE  Seq. 

16. 

EDITLB 

Editor  Object  Progran  Library 

EDITLIB  Seq. 

17. 

SIOADLB 

Loader  Object  Progran  Library 

EDITLIB  Seq. 

18. 

GENERLB 

Data  Base  and  Utility  Library 

EDITLIB  Seq. 

19. 

DATAHAN 

Lou  Level  Data  Base  Library 

EDITLIB  Seq. 

20. 

SUPLIB 

Internediate  Data  Base  Library 

EDITLIB  Seq. 

All  programs  and  control  sequences  are  distributed  as  they 
are  currently  used  on  DTNSRDC'S  CDC  6000  conputer  systens. 

As  such,  there  nay  be  ninor  variations  fron  the  listings 
that  appear  in  the  report. 
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INITIAL  DISTRIBUTION 


Copies 

1  USA  PICATINNY  ARSENAL 
1  B.  Nagel 

1  NRL 

1  R.  Perlut 

1  DNL 

2  USNA 

1  Dept  Math 
1  Tech  Lib 

1  NAVPGSCOL/Lib 

1  NAVWARCOL 

1  ROTC,  MIT 

1  NSWC/White  Oak 

1  R.J.  Edwards 

1  NUSC/New  London 
1  A.  Carlson 

1  NAVSEA 

1  SEA  321/J.  Claffey 

1  NAVAIR 

1  G.  Hand 


1 

NAVSHIPYD 

BREM/Lib 

1 

NAVSH1PYD 

CHASN/Lib 

1 

NAVSHIPYD 

MARE /Lib 

1 

NAVSHIPYD 

NORVA/Lib 

1 

NAVSHIPYD 

PEARL/Lib 

1 

NAVSHIPYD 

PHILA/Lib 

1 

NAVSHIPYD 

PTSMH/Lib 

12 

DTIC 

Copies 

15  AFFDL 

12  B.  Groomes 
1  P.  Pourier 
1  J.  Johnson 
1  J.  Folck 

1  NASA  Goddard  SFC 
1  J.  Mason 
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Center  Distribution 
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Code 

Name 

1 

1182 

Z . G .  Wachnik 

1 

1568 

L.  Motter 

1 

17 

W.W.  Murray 

1 

1720.2 

K.  Horn 

1 

1720.6 

R.D.  Rockwell 

1 

1730 

A.B.  Stavovy 

2 

1730.5 

J.C.  Adamchak 
J.  Figula 

2 

1740.5 

P.  Roth 

B.  Wang 

1 

1800 

G.H.  Gleissner 

1 

1802.1 

H.J.  Lugt 

1 

1805 

E.H.  Cu thill 

2 

1809.3 

D.  Harris 

1 

1824 

S.  Berkowitz 

1 

1840 

J.W.  Schoc 

2 

1843 

H.J.  Haussling 
M.E.  Haas 
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Copies 

Code 

Name 

1 

25 

1844 

1844 

S.K.  Dhir 

J.M.  McKee 

1 

1892.1 

J.  Strickland 

1 

1892.2 

D.  Sommer 

1 

1966 

J.  Caspar 

10 

5211.1 

Reports  Distribution 

1 

522.1 

Unclassified  Lib 

(C) 

1 

522.2 

Unclassified  Lib 

(A) 
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